-- card: 5539 from stack: in
-- bmap block id: 5870
-- flags: 0000
-- background id: 4709
-- name: Illustrations
----- HyperTalk script -----
on openCard
  ResetMenuField
end openCard

on mouseUp
  visual dissolve slow to card
  pop card
  ResetMenuField
end mouseUp

on ResetMenuField
  put " Newsletters" & return & " Graphic Design" & return & "•Illustrations" & return & " Presentations" & return & " Document Processing" & return & " Databases" & return & " Brochures" & return & " Image Transmission" & return & " Manuals" & return into card field "Select Field"
end ResetMenuField


-- part 2 (field)
-- low flags: 01
-- high flags: 2004
-- rect: left=26 top=76 right=233 bottom=192
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Select Field
----- HyperTalk script -----
on mouseUp
  global whichExample,showState
  put empty into whichExample
  put empty into showState
  put 1 + (the clickV - top of me) div textHeight of me into clickLine
  if line clickLine of me is not empty then
    put word 1 of line clickLine of card field "Select Field" into whichExample
    put "•" into char 1 of line clickLine of card field "Select Field"
    push card
    visual dissolve to card
    go to card whichExample
  else
    if line clickLine of me is not empty and whichExample is "Science &" then
      push card
      visual dissolve to card
      go to card "Science & Engineering"
    else
      if line clickLine of me is not empty and whichExample is "HyperCard Stack" then
        push card
        visual dissolve to card
        go to card "HyperCard Stack"
      end if
    end if
  end if
end mouseUp

on ResetMenuField
  put " Newsletters" & return & " Graphic Design" & return & " Illustrations" & return & " Presentations" & return & " Document Processing" & return & " Databases" & return & " Brochures" & return & " Image Transmission" & return & " Manuals" & return into card field "Select Field"
end ResetMenuField



-- part contents for card part 2
----- text -----
 Newsletters
 Graphic Design
•Illustrations
 Presentations
 Document Processing
 Databases
 Brochures
 Image Transmission
 Manuals